home *** CD-ROM | disk | FTP | other *** search
/ How Would You Survive? / How Would You Survive (1995)(Grolier)[Mac-PC].iso / mac / AZTECW.DIR / 01710_Script_Wars < prev    next >
Text File  |  1995-09-12  |  7KB  |  307 lines
  1. global gQuest, gBeenClicked
  2.  
  3. on AWarRollovers1
  4.   set gBeenClicked = 0
  5.   if (not(CheckClickedStatus(gQuest))) then
  6.     if rollover(9) then
  7.       ArrowCursor
  8.       repeat while rollover(9) 
  9.         set the locH of sprite 10 to 294
  10.         set the locV of sprite 10 to 293
  11.         updatestage
  12.       end repeat
  13.       set the locH of sprite 10 to 994
  14.       updatestage
  15.     else
  16.       if rollover(11) then
  17.         repeat while rollover(11)
  18.           AztecCursor
  19.           if the mousedown then
  20.             set GBeenClicked = 1
  21.           else
  22.             if gBeenClicked = 1 then
  23.               repeat while gBeenClicked = 1
  24.                 AnimateWar1
  25.               end repeat
  26.             end if
  27.           end if
  28.         end repeat
  29.       else
  30.         if rollover(40) then
  31.           HandCursor
  32.         else
  33.           if rollover(41) then
  34.             HandCursor
  35.           else
  36.             if rollover(42) then
  37.               HandCursor
  38.             else
  39.               ArrowCursor
  40.             end if
  41.           end if
  42.         end if
  43.       end if
  44.     end if
  45.   end if
  46.   RandomQuestion(gQuest)
  47. end
  48.  
  49. on AWarRollovers2
  50.   set gBeenClicked = 0
  51.   if (not(CheckClickedStatus(gQuest))) then
  52.     if rollover(9) then
  53.       repeat while rollover(9)
  54.         AztecCursor
  55.         puppetsprite 10, true
  56.         set the locH of sprite 10 to 151
  57.         set the locV of sprite 10 to 202
  58.         updatestage
  59.         if the mousedown then
  60.           set GBeenClicked = 1
  61.         else
  62.           if gBeenClicked = 1 then
  63.             repeat while gBeenClicked = 1
  64.               AnimateWar2
  65.             end repeat
  66.           end if
  67.         end if
  68.       end repeat
  69.       puppetsprite 10, false
  70.       updatestage
  71.     else
  72.       if rollover(8) then
  73.         repeat while rollover(8)
  74.           AztecCursor
  75.           puppetsprite 11, true
  76.           set the locH of sprite 11 to 414
  77.           set the locV of sprite 11 to 288
  78.           updatestage
  79.           if the mousedown then
  80.             set GBeenClicked = 1
  81.           else
  82.             if gBeenClicked = 1 then
  83.               repeat while gBeenClicked = 1
  84.                 AnimateLoop 8, 963, 4, "SA321001.AIF", 1
  85.               end repeat
  86.             end if
  87.           end if
  88.         end repeat
  89.         set the locH of sprite 11 to 914
  90.         puppetsprite 11, false
  91.         updatestage
  92.       else
  93.         if rollover(12) then
  94.           ArrowCursor
  95.           repeat while rollover(12)
  96.             set the locH of sprite 13 to 213
  97.             set the locV of sprite 13 to 338
  98.             updatestage
  99.           end repeat
  100.           set the locH of sprite 13 to 913
  101.           updatestage
  102.         else
  103.           if rollover(39) then
  104.             HandCursor
  105.           else
  106.             if rollover(41) then
  107.               HandCursor
  108.             else
  109.               if rollover(42) then
  110.                 HandCursor
  111.               else
  112.                 ArrowCursor
  113.               end if
  114.             end if
  115.           end if
  116.         end if
  117.       end if
  118.     end if
  119.   end if
  120.   RandomQuestion(gQuest)
  121. end
  122.  
  123.  
  124. on AnimateWar1
  125.   ArrowCursor
  126.   set gAnimationcast1 = 937
  127.   set gAnimationcast2 = 947
  128.   set gAnimationcast3 = 942
  129.   set count = 0
  130.   puppetsound "SA320800.AIF (FIGHT)"
  131.   updatestage
  132.   repeat while count < 2 and (the mouseUp)
  133.     set the loch of sprite 3 to 349
  134.     set the locV of sprite 3 to 112
  135.     updatestage
  136.     wait .1    
  137.     
  138.     set the castnum of sprite 3 = gAnimationcast1 + 1
  139.     updatestage
  140.     wait .1
  141.     if (the mousedown) then 
  142.       exit repeat
  143.     end if
  144.     
  145.     set the castnum of sprite 3 = gAnimationcast1 + 2
  146.     updatestage
  147.     wait .1
  148.     if (the mousedown) then 
  149.       exit repeat
  150.     end if
  151.     
  152.     set the castnum of sprite 3 = gAnimationcast1 + 3
  153.     updatestage
  154.     wait .1
  155.     if (the mousedown) then 
  156.       exit repeat
  157.     end if
  158.     
  159.     set the loch of sprite 3 to 849
  160.     set the loch of sprite 4 to 379
  161.     set the locV of sprite 4 to 225
  162.     updatestage
  163.     wait .1
  164.     
  165.     set the castnum of sprite 4 = gAnimationcast2 + 1
  166.     set the loch of sprite 2 to 283
  167.     set the locV of sprite 2 to 154
  168.     updatestage
  169.     wait .1
  170.     if (the mousedown) then 
  171.       exit repeat
  172.     end if
  173.     
  174.     set the castnum of sprite 4 = gAnimationcast2 + 2
  175.     set the castnum of sprite 2 = gAnimationcast3 + 1
  176.     updatestage
  177.     wait .1
  178.     if (the mousedown) then 
  179.       exit repeat
  180.     end if
  181.     
  182.     set the castnum of sprite 2 = gAnimationcast3 + 2
  183.     updatestage
  184.     wait .1
  185.     if (the mousedown) then 
  186.       exit repeat
  187.     end if
  188.     
  189.     set the castnum of sprite 4 = gAnimationcast2 + 2
  190.     set the castnum of sprite 2 = gAnimationcast3 + 3
  191.     updatestage
  192.     wait .1
  193.     if (the mousedown) then 
  194.       exit repeat
  195.     end if
  196.     
  197.     set the castnum of sprite 4 = gAnimationcast2 + 1
  198.     set the castnum of sprite 2 = gAnimationcast3 + 2
  199.     updatestage
  200.     wait .1
  201.     if (the mousedown) then 
  202.       exit repeat
  203.     end if
  204.     
  205.     set the castnum of sprite 4 = gAnimationcast2
  206.     set the castnum of sprite 2 = gAnimationcast3 + 1
  207.     updatestage
  208.     wait .1
  209.     if (the mousedown) then 
  210.       exit repeat
  211.     end if
  212.     
  213.     set the loch of sprite 4 to 849
  214.     set the castnum of sprite 2 = gAnimationcast3 + 1
  215.     updatestage
  216.     wait .1
  217.     if (the mousedown) then 
  218.       exit repeat
  219.     end if
  220.     
  221.     set the loch of sprite 2 to 849
  222.     updatestage
  223.     wait .1
  224.     if (the mousedown) then 
  225.       exit repeat
  226.     end if
  227.     
  228.     set count = count + 1
  229.   end repeat
  230.   set the loch of sprite 2 to 849
  231.   set the loch of sprite 3 to 849
  232.   set the loch of sprite 4 to 849
  233.   updatestage
  234.   sound fadeout 1, 2*60
  235.   set gBeenClicked = 0
  236. end
  237.  
  238. on AnimateWar2
  239.   ArrowCursor
  240.   set gAnimationcast1 = 956
  241.   set gAnimationcast2 = 960
  242.   set count = 0
  243.   puppetsound "SA320900.AIF"
  244.   updatestage
  245.   repeat while count < 5 and (the mouseUp)
  246.     
  247.     set the loch of sprite 6 to 341
  248.     set the locV of sprite 6 to 133
  249.     set the loch of sprite 7 to 425
  250.     set the locV of sprite 7 to 229
  251.     updatestage
  252.     wait .1    
  253.     
  254.     set the castnum of sprite 6 = gAnimationcast1 + 1
  255.     set the castnum of sprite 7 = gAnimationcast2 + 1
  256.     updatestage
  257.     wait .1
  258.     if (the mousedown) then 
  259.       exit repeat
  260.     end if
  261.     
  262.     set the castnum of sprite 6 = gAnimationcast1 + 2
  263.     set the castnum of sprite 7 = gAnimationcast2 + 2
  264.     updatestage
  265.     wait .1
  266.     if (the mousedown) then 
  267.       exit repeat
  268.     end if
  269.     
  270.     set the castnum of sprite 7 = gAnimationcast2 + 1
  271.     updatestage
  272.     wait .1
  273.     if (the mousedown) then 
  274.       exit repeat
  275.     end if
  276.     
  277.     set the castnum of sprite 6 = gAnimationcast1 + 2
  278.     set the castnum of sprite 7 = gAnimationcast2
  279.     updatestage
  280.     wait .1
  281.     if (the mousedown) then 
  282.       exit repeat
  283.     end if
  284.     
  285.     set the castnum of sprite 6 = gAnimationcast1 + 1
  286.     updatestage
  287.     wait .1
  288.     if (the mousedown) then 
  289.       exit repeat
  290.     end if
  291.     
  292.     set the castnum of sprite 6 = gAnimationcast1
  293.     updatestage
  294.     wait .1
  295.     if (the mousedown) then 
  296.       exit repeat
  297.     end if
  298.     
  299.     set count = count + 1
  300.   end repeat
  301.   set the loch of sprite 6 to 849
  302.   set the loch of sprite 7 to 849
  303.   updatestage
  304.   sound stop 1
  305.   set gBeenClicked = 0
  306. end
  307.